home *** CD-ROM | disk | FTP | other *** search
/ Mission to McDonaldLand / Mission To McDonaldLand.iso / matele.dxr / 00022_Script_Rnd animation < prev    next >
Text File  |  1998-10-22  |  436b  |  14 lines
  1. on enterFrame me
  2.   global restoration
  3.   global castrestore
  4.   global nomore
  5.   if nomore = 1 then abort
  6.   set dice = random (20)
  7.   if dice > 1 then abort
  8.   set the member of sprite restoration = castrestore
  9.   set castrestore = the castnum of sprite the spritenum of me
  10.   set restoration = the spritenum of me
  11.   set the member of sprite the spritenum of me = the castnum of sprite the spritenum of me + 1
  12.   set nomore = 1
  13. end
  14.